home *** CD-ROM | disk | FTP | other *** search
/ Computer Life 1997 February / Computer Life February 1997.iso / TELME / COMMS / LAN3001.SRP < prev    next >
Text File  |  1996-06-04  |  1KB  |  67 lines
  1. rem Copyright (c) PhoneLink plc
  2. rem Symicron (10/8/95)
  3.  
  4. label InitDevice
  5. echo off
  6. echo script[55]
  7. send    "char(13)"
  8. timeout 5,pad_fail
  9. find    "*"
  10. send    "set 1:1,2:0,3:2,4:1,15:0char(13)"
  11. timeout 5,pad_set_fail
  12. find    "*"
  13. label OffToGate 
  14. echo off
  15. echo script[51]..
  16. send    "char(13)"
  17. timeout 5,pad_fail
  18. find    "*"
  19. echo script[53]
  20. send    "call {NUA}char(13)"
  21. timeout 20,nua_bad1
  22. finderr 0,COM,nua_good
  23. find    "ZZZ"
  24. label nua_bad1
  25. echo script[58]
  26. send    "call {NUA}char(13)"
  27. timeout 20,nua_bad2
  28. finderr 0,COM,nua_good
  29. find    "ZZZ"
  30. label nua_bad2
  31. echo script[58]
  32. send    "call {NUA}char(13)"
  33. timeout 20,nua_fail
  34. finderr 0,CLR DTE,dte_cleared
  35. finderr 0,CLR DER,der_cleared
  36. find    "COM"
  37. label nua_good
  38. echo script[54].
  39. end
  40.  
  41. label GateToOff 
  42. echo off
  43. echo script[92]
  44. send    "char(16)CLRchar(13)"
  45. echo script[99].
  46. end
  47.  
  48. label pad_fail
  49. echo script[4]
  50. abort
  51.  
  52. label pad_set_fail
  53. echo script[5]
  54. abort
  55.  
  56. label nua_fail
  57. echo script[22]
  58. abort
  59.  
  60. label dte_cleared
  61. echo script[6]
  62. abort
  63.  
  64. label der_cleared
  65. echo script[7]
  66. abort
  67.